🥑GRAFICA PERSONALIZADA

library(readxl)
Caso_Aguacate_xls<-read_excel("avocado.csv..xlsx")

GRAFICA MEJORADA DE PRECIOS PROMEDIOS DE AGUACATE CON LAS BOLSAS TOTALES

# ASIGNANDO LA REGION

Note

Important

• Esta es una grafica donde nos permite visualizar las distribuciones de cada region con sus respectivos datos.

• Podemos visualizar que en el lado izquierdo se encuentra las bolsas totales y en la parte inferior precio promedio.

• Las regiones se ordenan alfabeticamente A-Z .

library(ggplot2)
    p <- ggplot(Caso_Aguacate_xls, aes(x=`AveragePrice       (PRECIO PROMEDIO)`,
                                       y=`Total Bags  (BOLSAS TOTALES)`,
                                       colorspaces, 
                                       size = `region (REGION)`))+geom_point()+                                             geom_smooth()
    p